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1 Ein erstes einfaches Beispiel 
1.1 leTEX-Dokument 

Folgendes Dokument wird uns, mit leichten Abwandlungen, fur einige Zeit lang durch die 
vorgestellten BibTgX-Style-Beispiele begleiten. 



% simple.tex 




\documentclass [a4paper] {article} 




\newenvironment{book} [1] {Buch ' 1 #1 ' ' : °/ 0 




\begin{description} 0 /, 




\renewcommand\author [1] {\item [Autor : ] 


##1.}°/. 


\renewcommand\title [1] {\item [Titel : ] 


##1.}°/. 


H% 




\end{description} 

} 




\begin{document> 




\nocite{*} 




\bibliography{simple> 




\bibliographystyle{simple} 




\end{document> 





Es ist sehr einfach gehalten: Wichtig sind die letzten drei Zeilen vor dem \end{document}, in 
der die Literaturdatenbank namens simple. bib und der BibTgX-Style simple. bst dekla- 
riert werden. Durch \nocite{*} wird dafiir gesorgt, dafi alle in der Datenbank existierenden 
Eintrage bearbeitet werden. 

Die Umgebung book und die beiden Anweisungen \author und \title werden vom gleich 
vorgestellten Beispiel-BibTEX-Style als Markup- Anweisungen erzeugt. 

1.2 Literaturdatenbank 

Durch die ersten Beispiele wird uns folgende kleine Literaturdatenbank begleiten: 
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7, simple. bib 

@book{eins, 

author = {Bernd Raichle}, 

title = {Bib\TeX-Programmierung} 

} 

@book{zwei , 

author = {A.U. Thor}, 
title = {Das Buch} 

} 



1.3 Formatierung mit I£TeX 

Der erste Formatierdurchlauf mit WFftX. . . . 



> latex simple 

This is TeX, Version 3.14159 (Web2C 7.3.1) 

(simple . tex 

LaTeX2e <2000/06/01> 

Babel <v3.6x> and hyphenation patterns for american, french, german, 
ngerman, nohyphenation, loaded. 

(/koblocalO/local/teTeX/share/texmf /tex/lat ex/base/article . els 

Document Class: article 2000/06/07 vl.4a Standard LaTeX document class 

C/koblocalO/local/teTeX/share/texmf /tex/latex/base/sizelO . clo) ) 

No file simple. aux. 

No file simple. bbl. 

(simple. aux) ) 

No pages of output . 

Transcript written on simple.log. 



. . . erzeugt folgende . aux-Datei: 



7 0 simple, aux 
\relax 

\citation{*} 

\bibdata{simple} 

\bibstyle{simple} 



Wie man sieht, werden die Anweisungen \bibliography, in der man auch mehr als eine Li- 
teraturdatenbankdatei angeben kann, und \bibliographystyle in eine etwas andere Form 
in die . aux-Datei geschrieben. Aufierdem findet sich fur jedes im Dokument vorkommendes 
\cite und \nocite ebenso eine entsprechende Zeile in der .aux-Datei. 

1.4 Generierung des Literaturverzeichnisses mit BibT^X 

Der anschliefiende BibT^X-Lauf erzeugt . . . 
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> bibtex simple 

This is BibTeX, Version 0.99c (Web2C 7.3.1) 
The top-level auxiliary file: simple. aux 
The style file: simple. bst 
Database file #1: simple. bib 



. . . dann das formatierte Literaturverzeichnis: 

7, simple. bbl 
\begin{book}{eins} 

\author{Bernd Raichle} 

\title{Bib\TeX-Programmierimg} 
\end{book} 
\begin{book}{zwei} 

\author{A.U. Thor> 

\title{Das Buch} 
\end{book} 



Im Unterschied zu den Standard-BibT^X-Styles wahlte ich hier bewufit eine andere Markup- 
Struktur. Ublicherweise sieht eine bbl-Datei wie folgt aus: 

% standard-bst .bbl 
\begin{thebibliography>{l} 

\bibitem{eins} Bernd Raichle: \emph{Bib\TeX-Programmierung} . 
\bibitem{zwei} A.U. Thor: \emph{Das Buch}. 
\end{thebibliography} 



BibTJn]X benotigt immer eine . aux-Datei, die genau einen Eintrag mit mindestens einer 
Literaturdatenbankdatei und genau einen Eintrag fur den zu verwendenden BibTgX-Style 
enthalten muss. Aufierdem wird mindestens eine Literaturreferenz benotigt. Die gelesene 
. aux wie auch den verwendeten BibTgX-Style als auch alle gelesenen Literaturdatenbank- 
dateien werden im Protokoll des BibTgX-Laufs aufgefuhrt. 

1.5 BibT E X-Style ..simple.bst" 

Mit diesem vollstandigen BibTgX-Style, bestehend aus nur 14 nichtleeren Zeilen, wird das 
vorstehende Ergebnis erzeugt. 
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7o simple. bst 
ENTRY 

{ author 
title 

} 

O 
O 

FUNCTION {book} 

{ "Ybegin-CbookH" write$ cite$ write$ "}" write$ newline$ 
" \author{" author * "}" * write$ newline$ 
" \title{" title "}" * * write$ newline$ 
"\end{book>" write$ newline$ 

} 

READ 

ITERATE {call.type$> 



Dieses Beispiel zeigt den prinzipiellen Aufbei eines BibT^X-Styles: 

1. Deklaration der benutzten Felder (author, title) in den Literaturdatenbanken, 

2. Definition von Funktionen fiir jeden verwendeten Eintragstyp (book), 

3. Einlesen der Literaturdatenbanken mit READ, 

4. iteratives Bearbeiten jedes Eintrags durch Aufruf der zuvor definierten Funktion fiir 
den jeweiligen Eintragstyp. 



2 Aufbau von BibT^X-Styles 

2.1 Bestandteile eines BibT£X-Styles 

Jeder BibTgX-Style hat folgende Bestandteile: 

- Deklaration der verwendeten Felder und Integer-/String-Variablen, auf die im Pro- 
gramm zugegriffen wird, fiir jeden Literatureintrag (Anweisung: ENTRY). 

- Deklaration aller global verwendeten Integer-/String-Variablen (Anweisungen: STRING 
und INTEGERS). 

- Definition aller Makros, die in der Literaturdatenbank verwendet werden (Anweisung: 
MACRO). 

- Definition aller Funktionen (Anweisung: FUNCTION). 

- Anweisung READ zum Einlesen der Literaturdatenbank. 

- Anweisung EXECUTE zum Aufruf einer Funktion. 

- Anweisungen ITERATE und REVERSE zum Aufruf einer Funktion, die auf alle Literatu- 
reintrage in gegebener bzw. umgekehrter Reihenfolge angewandt wird. 
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- Anweisung SORT zum Sortieren der Literatureintrage anhand der String- Variable sort . key$. 



Die Reihenfolge, in der diese Anweisungen stehen miissen, ist nicht ganz beliebig: Vor dem 
Einlesen mit READ miissen mit ENTRY die zu verwendeten Felder und mit MACRO alle in 
der Datenbank verwendeten Makros deklariert bzw. definiert werden. Weiters konnen die 
Anweisungen zur Manipulation von Eintragen (SORT, ITERATE, REVERSE) erst ausgefuhrt 
werden, nachdem mit READ die Eintrage aus der Datenbank gelesen wurden. Schliefilich 
konnen Funktionen erst aufgerufen und Variablen erst verwendet werden, wenn diese vorher 
definiert bzw. deklariert wurden. 

2.2 Struktur eines BibT^X-Styles 

Jeder BibT^X-Style hat folgende grobe Struktur: 

1. Deklaration der verwendeten Literatureintragstypen und -felder, Lesen der Literaturein- 
trage: 



% Deklaration der Felder und Variablen 
ENTRY 

{ . . . Felder . . . 

} 

{ ... Integer-Variablen ...} 
{ ... String-Variablen . . . } 

INTEGERS { . . . globale Integer-Variablen . . . } 
STRINGS { . . . globale String-Variablen . . . } 

7, Definition von Makros und Funktionen 
MACRO { . . . } 
FUNCTION { . . . } 

% Initialisierung von Variablen 
EXECUTE { . . . } 

% Einlesen der Literaturdatenbank 
READ 



2. Bearbeitung der Literatureintrage, Erzeugung des Literaturverzeichnisses: 
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% Deklaration weiterer Variablen 

INTEGERS { . . . globale Integer-Variablen . . . } 

STRINGS { . . . globale String-Variablen . . . } 

7, Definition weiterer Funktionen 
FUNCTION { . . . } 

°/ 0 Initialisierung von Variablen 
EXECUTE { . . . } 



% Manipulation der Datenbankeintraege 
ITERATE { . . . } 
REVERSE { . . . } 
SORT 



7. Initialisierung vor und Beginn der Ausgabe 
EXEUTE { . . . } 

7. Erzeugung der Ausgabe pro Eintrag 
ITERATE {call.type$> 

% Abschluss der Ausgabe 
EXEUTE { . . . } 



Wie vorher schon beschrieben, enthalt ein BibT^X-Style irgendwann die Anweisung READ, 
die die Eintrage in alien angegebenen Literaturdatenbanken, also den Dateien mit Endung 
.bib, einliest. Vor dieser Anweisung miissen alle Eintragsfelder, auf die man im folenden 
zugreifen will, mit ENTRY deklariert werden. Ebenso miissen auch alle in den Datenbanken 
verwendeten Abkiirzungen entweder in dieser mit ©String. . . oder im BibTgX-Style mit 
der Anweisung MACRO defmieren. Somit startet jede BibT^X- Style iiblicherweise mit eben 
diesen Deklarationen und sonstigen Initialisierungen. 

Im zweiten Teil eines BibTgX-Styles wird das Ergebnis erzeugt. Dort findet man irgendwann 
die Zeile ITERATE{call .type$}. Um fur jeden Eintrag die gewiinschte Formatierung fest- 
zulegen, miissen dazu vorher entsprechende Funktionen defmiert werden. Diese Funktionen 
verwenden Unterfunktionen und greifen auf Variablen zur Zwischenspeicherung zu, diese 
vor Verwendung defmiert werden. Wenn Eintrage umsortiert werden sollen, so macht man 
dies auch zwischen Einlesen der Eintrage und dem Erzeugen des Gesamtergebnisses. Somit 
findet man in diesem Abschnitt weitere Funktionsdefinitionen und Variablendeklarationen, 
Anweisungen wie SORT, ITERATE und REVERSE 
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3 Datentypen, Variablen, vordefinierte Funktionen 



3.1 Datentypen 

Als Datentypen gibt es nur ganze Zahlen (Integer) und Zeichenketten (Strings). 
Zeichenketten-Konstanten Zahl-Konstanten 

- "" - #0 

- "a" - #1, . . . 

- "ein Name", . . . 

3.2 Variablen 

Variablen- und Funktionsnamen beginnen mit einem Buchstaben, gefolgt von Buchstaben, 
Ziffern und sonstigen darstellbaren Zeichen aufier den folgenden zehn Zeichen: 

" # 7. ' ( ) , = { > 

Klein- und Grofischreibung wird nicht unterschieden. Alle Variablen miissen vorher explizit 
als Zahl- oder Zeichenkettenvariable mit INTEGERS, STRINGS oder ENTRY deklariert werden. 

Wert einer Variable Name einer Variable 

- label - 'label 

- "label" quote$ 

3.3 Vordefinierte Funktionen 

BibT^X stellt dem Programmierer 32 vordefinierte Funktionen zur Verfiigung. Ein Program- 
mierer kann mit der Anweisung FUNCTION eigene Funktionen definieren, die diese vordefi- 
nierte Funktionen verwenden, um komplexere Dinge zu bewerkstelligen. 

Fast alle Funktionsnamen der internen Funktionen enden mit einem $. Um selbstdefinierte 
von den vordefinierte Funktionen leicht unterschciden zu konnen, ist es daher ratsam, in 
diesen kein Dollarzeichen $ zu verwenden. 

Die vordefinierten Funktionen lassen sich grob in folgende Klassen einteilen: 
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Wertzuweisung 

- integer variable : = 

- string variable : = 

Pradikate auf Zahlen 

- integer integer < 

- integer integer > 

- integer integer = 

Rechenoperationen auf Zahlen 

- integer integer + 

- integer integer - 

Wandlung String, Char, Integer 

- string chr . to . int$ 

- integer int . to . chr$ 

- integer int.to.str$ 

String-Information 

- string num.names$ 

- string text . length$ 

- string width$ 

String-Manipulation 

- string integer integer substring$ 

- string integer text.prefix$ 

- string purify$ 

- string string change . case$ 

- string integer string f ormat .name$ 

- string add.period$ 

Vordefinierte Variablen 

- sort.key$ (String, pro Eintrag) 

- entry. max$ (Integer, maximale 
String-Lange) 

- global. max$ (Integer, maximale 
String-Lange) 



Konkatenation von Zeichenketten 

- string string * 

Pradikate auf Zeichenketten 

- string empty$ 

- string missing$ 

- string string = 

Literatureintragsdaten 

- cite$ 

- type$ 

- preamble$ 

KontrollfluB 

- integer literal literal if$ 

- literal literal while$ 

- call . type$ (Indirekter Aufruf ) 

- skip$ (No-Op) 

Spezielle Stack-Operationen 

- literal („Push") 

- literal pop$ 

- literal duplicates 

- literal literal swap$ 

- literal top$ (Debugging) 

- literal * stack$ (Debugging) 

Ausgabe bbl-Datei 

- string write$ 

- newline$ 

Protokollausgabe 

- string warning$ 

Sonstige 

- string quote$ 
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4 UPN ist ungewohnt 



4.1 Postfix-Notation von BibT£X 

Alle Anweisungen in einem BibT^X-Style werden in Postfix-Notation bzw. in der umgekehr- 
ten polnischen Notation (UPN) gegeben. Der prinzipielle Aufbau ist immer 

operandi ■ ■ ■ operand^ operator 



Beispiele 



#1 #2 + 






"a" 'label := 






#0 { "gleich 0" warningf 


! } { "ungleich 0" warning!: 


5 } if$ 



Dies ist zuerst sehr ungewohnt, da die meisten Programmiersprache eine Infix- oder Prafix- 
Notation besitzen. Es gibt jedoch neben BibT^X noch weitere Programmiersprachen, wie 
beispielsweise PostScript, mit Postfix- Notation. 

Merkregel: Ausfiihrung der Anweisung in passiver Form formulieren (Beispiel: „Die Kon- 
stanten 1 und 2 werden addiert.") 

4.2 lnfix-/Prafix-Notation anderer Programmiersprachen 

Zum Vergleich habe ich hier einmal obige Zeilen in einer wohl etwas gewohnteren Form 
hingeschrieben . 

Bei diesen Programmiersprachen stehen die Operatoren zwischen bzw. vor den Operanden. 

Beispiele Infix-Notation 

1 + 2 

label := "a" 

if 0 then print ("gleich 0") else print ("ungleich 0") endif 



Beispiele Prafix-Notation 

add(l, 2) 

assign(label, "a") 

if(0, print ("gleich 0"), print ("ungleich 0")) 
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(+ 1 2) 

(setq label "a") 

(if 0 (print "gleich 0") (print "ungleich 0")) 



4.3 UPN: Manipulation eines Stapels 

Wie Operationen in UPN ausgefiihrt werden, lafit sich am anschaulichsten mit einem Stapel 
beschreiben, auf den man Dinge legen und von dem man Dinge nehmen kann. Dabei ist 
wichtig, dafi man dies nur zuoberst tun kann. Jede Operation mit Argumenten nimmt diese 
von unserem gedachten Stapel herunter, tut mit diesen etwas oder berechnet etwas und legt 
ein eventuell vorhandenes Ergebnis am Schlufi wieder auf diesen Stapel. 



#1 #2 + 



Konstanten werden einfach auf den Stapel gelegt. Als erstes wird somit zuerst die Konstan- 
te 1 auf den Stapel gelegt, danach die Konstante 2 obenauf. Die Operation + erwartet zwei 
Argumente, dies sollten Zahlen sein, addiert diese und legt das Ergebnis wieder auf den 
Stapel ab.+ nimmt zuerst die 2, dann die 1 vom Stapel, addiert beide zu 3 und legt dieses 
Ergebnis auf den Stapel ab. 



'drei' 



zwei 



zwei 



zwei 



'drei' 



ems 



ems 



ems 



ems 



"dreizwei" 



ems 



ems 



'dreizwei' 



'dreizweieins' 



"eins" "zwei" "drei" swap$ * swap$ * pop$ 



Auch hier werden zuerst die drei String-Konstanten nacheinander auf den Stapel gelegt. 
Die Operation swap$ erwartet nun zwei Argumente und legt diese vertauscht auf den Sta- 
pel zuriick. Somit werden dadurch die beiden obersten Strings "drei" und "zwei" auf dem 
Stapel vertauscht. * ist eine Konkatenation zweier Strings, erwartet zwei Argumente, die 
Strings sein miissen, und legt den zusammengefugten String auf den Stapel zuriick. Hiermit 
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wird aus den zuvor vertauschten Strings der neue String "dreizwei" erzeugt. Die nachfol- 
genden Operationen * und swap$ vertauscht erneut die beiden obersten Eintrage und fiigt 
diese zum neuen String "dreizweieins" zusammen. pop$ ist eine Operation mit einem 
Argument, die sonst nichts tut und auch nichts auf den Stapel zuriicklegt. Diese Operation 
verwendet man, um das oberste Element auf dem Stapel zu entfernen, wenn man dieses nicht 
mehr verwenden kann. Dies tun wir auch in diesem Beispiel, um am Ende „aufzuraumen" 
und einen leeren Stapel zu hinterlassen. 

4.4 BibT£X-Style „simple.bst" . . . nochmals betrachtet 

Wenn wir mit diesen Grundlagen iiber Aufbau eines BibTgX-Styles und die Programmier- 
sprache unser erstes Beispiel nochmals betrachten, so sollte uns dieses schon etwas vertrauter 
vorkommen. 

7, simple. bst 
ENTRY 

{ author 
title 

} 

O 
O 

FUNCTION {book} 

{ "\begin{book}{" write$ cite$ write$ "}" write! newline$ 
" \author{" author * "}" * write$ newline$ 
" \title{" title "}" * * write! newlinel 
"\end{book>" write$ newline$ 

} 

READ 

ITERATE {call.type$} 



7. simple. bbl 
\begin{book}{eins} 

\author{Bernd Raichle} 

\title{Bib\TeX-Programmierung} 
\end{book> 
\begin{book}{zwei} 

\author{A.U. Thor} 

\title{Das Buch} 
\end{book> 



Durch die Anweisung ITERATE {call .type$} wird fur jeden Literatureintrag des Typs book 
die gleichnamige Funktion aufgerufen. Diese erzeugt pro Aufruf vier Zeilen in der bbl-Datei. 

Auf die Felder author und title eines Literatureintrags kann einfach durch den gleich- 
namigen in ENTRY deklarierten Variablenname zugegriffen werden. Man erhalt hierbei den 
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Wert des Feldes als Zeichenkette. Den Zitierschliissel des momentan bearbeiteten Literatu- 
reintrags erhalte ich mit der Funktion cite$ ebenso als Zeichenkette. 

Wie man am Code erkennen kann, werden die vier Ergebniszeilen auf sehr unterschiedliche 
Weise zusammengesetzt: Wahrend ich die einzelnen Teile der ersten Zeile durch mehrere 
write$-Anweisungen erzeuge, baue ich die einzelnen Zeichenketten der zweiten und dritten 
Zeile vor dem Herausschreiben durch Konkatenation mit * zu einer einzigen Zeichenkette 
zusammen. 

Die Funktion * erwartet zwei Zeichenketten als Operanden und hat als Ergebnis die zusam- 
mengefugte Zeichenkette. Wie man im Vergleich der zweiten und dritten Zeile sieht, kann 
man mehrere Zeichenketten entweder paarweise sofort zusammenfiigen oder die Zeichenket- 
ten zuerst hinschreiben und dann erst die notwendigen Konkatenationen ausfiihren. 



5 Erweiterung #1: format.feld 



% erwl.bst 




ENTRY 




{ author 




title 




} 




O 




O 




FUNCTION {format.feld} 


V/XVh ««««««< 


{ duplicate$ empty! 




{ pop$ pop$ } 




{ swap$ "{" * swap$ * "}" * writes 


» newline$ } 


if$ 




} 




FUNCTION {book} 




{ "\begin{book}{" write! cite$ write$ 


"}" write$ newline$ 


" \author" author format.feld 


V/XVh ««««««< 


" \title" title format.feld 


°/°LT/°L ««««««< 


"\end{book}" write$ newline$ 

} 




READ 




ITERATE {call.type$} 





Bisher wurde die Formatierung fur beide Felder durch die immer wieder gleiche Abfol- 
ge von vordefmierten Funktionen erzeugt. Diese fasse ich nun in einer eigenen Funktion 
format.feld zusammen, die ich als Unterfunktion verwende. Diese neue Funktion erweite- 
re ich gleich: 1st ein Feld nicht vorhanden oder leer, so wird keine Ausgabezeile erzeugt. 

Die Funktion format.feld erwartet zwei Operanden: das Feld (bzw. den Wert des Feldes) 
und die MEX-Anweisung, die in die bbl-Datei geschrieben werden soil. Zuerst wird der 
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Feldwert dupliziert und mit empty$ getestet, ob das Duplikat leer ist. Die Funktion if $ 
nimmt nun das Ergebnis dieses Tests und fuhrt abhangig davon entweder die eine oder 
die andere Anweisungsfolge ab. War das Feld leer oder nicht vorhanden, so wird mit den 
beiden Anweisungen pop$ der verbliebene Feldwert als auch die Zeichenkette mit der DTj^X- 
Anweisung entfernt. Ist das Feld nicht-leer, so wird mit swap$ der verbliebende Feldwert 
und die Zeichenkette mit der DTj^X-Anweisung vertauscht, damit die offnende Klammer 
angefiigt werden kann. Anschliefiend wird diese neu entstandende Zeichenkette nochmals mit 
dem davorstehenden Feldwert vertauscht und dann wie gewohnt Feldwert und schliefiende 
Klammer zusammengefugt. 

Alternativ kann man die Funktion format. feld auch besser wie folgt implementieren: 

FUNCTION {format. feld} 
{ duplicate$ empty! 
{ pop$ pop$ } 

{ "{" swap$ "}" * * * write$ newline$ } 
if$ 

} 



Hierdurch werden zuerst die offnende Klammer, der Feldwert und dann die schliefiende 
Klammer zu einer Zeichenkette verbunden, bevor diese dann mit der DTgX-Anweisung zu- 
sammengefugt wird. Man beachte, dafi hierbei zwischendurch andere Zeichenketten entste- 
hen, da in einer anderen Reihenfolge zusammengefugt wird. 

Diese Reihenfolge ergibt leichter erfafibaren und verstehbaren Code und ist daher zu bevor- 
zugen. 
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6 Erweiterung #2: f ormat . f eld nochmals verbessert 



/o erwz . Dst 




TTMTPV 




\ autnor 




title 




\ 
J 




s\ 




O 




T7TT"I\T/'""T , T HAT J" -P _ _i_ _C _ "l J "1 

r UJML1 1UJM it ormat . tela J 




{ dup lie at e $ emp t y $ 




i pop!t> popn> i 




S II J" 11 „„„.„cb ll"LM j, o. II \ 1 

i v swapit ">"***" \' 


swap$ * write$ newline$ } 


A 


<.<.<.<.<<<.<.<.%<.<.<. 


if$ 




} 




FUNCTION {book} 




{ "Ybegin-CbookH" write$ cite$ 


write$ "}" write! newline$ 


"author" author f ormat. f eld 


y.y.y.7.'/. ««««««< 


"title" title f ormat . f eld 


%7.%T/. ««««««< 


"\end{book>" write$ newline$ 




} 




READ 




ITERATE {call.type$} 





Die DTp^X-Anweisungen, die man iiber das zweite Argument der Funktion f ormat. f eld 
enthalten noch ahnliche Bestandteile. Daher bietet es sich an, auch diese in die Funktion zu 
verlagern. 
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7 Erweiterung #3: begin. bib/end. bib 



7. erw3.bst 



FUNCTION {begin. bib} VLVL1 «<««««« 

{ "\begin{thebibliography}{9999}" write$ newline$ 

} 



FUNCTION {end. bib} VLVLl ««««««< 

{ "\end{thebibliography}" write$ newline$ 
"\endinput" write$ newline$ 

} 



READ 

EXECUTE {begin. bib} 
ITERATE {call.type$} 
EXECUTE {end. bib} 



7.7.7.°/.% ««««««< 
'LTLVL ««««««< 



Falls es noch nicht bemerkt wurde: Durch unseren bisherigen BibT^X-Style und die DT^X- 
Makros im Dokument wurde die einzelnen Literatureintrage nicht in Listenumgebung fur 
Literaturverzeichnisse wie thebibliography gepackt, jeder Eintrag war im Dokument fiir 
sich separat. Zu Beginn und am Ende einer bbl-Datei kann etwas sehr leicht mit EXECUTE- 
Anweisungen eingefugt werden. Der obige BibTpjX-Style Kigt am Anfang und am Ende der 
bbl-Datei entsprechende Zeilen ein, um die Umgebung thebibliography zu beginnen bzw. 
zu beenden. 



8 Erweiterung #4: begin. entry /end. entry- 
Die Zeichenketten, die zu Beginn und am Ende eines Literatureintrags in die bbl-Datei 
geschrieben werden, enthalten gleiche Anteile. Der Markup wird ebenso verallgemeinert. 
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% erw4.bst 




FUNCTION {begin. entry} 

{ "\begin{entry}{" swap$ * "}{" * 

> 


n°/.n ««««««< 

cite$ * "}" * write$ newline$ 


FUNCTION {end. entry} 

{ "\end{entry}" write$ newline$ 

} 


VL1TL ««««««< 


FUNCTION {book} 

{ "Buch" begin. entry 

"author" author format.feld 
"title" title format.feld 
end . entry 

} 


««««««< 

1VLTL ««««««< 



Hier sind die notwendigen Anderungen an den IM^X-Markup-Anweisungen: 



°L erw4.tex 

\documentclass [a4paper] {article} 

\newenvironment{entry} [2] {\bibitem [#1] {#2} " #2 " : 7, 

% — " ~~ ««««« 

\begin{description}°/ 0 

\renewcommand\author [1] {\item [Autor : ] ##1 . }°/, 
\renewcommand\title [1] {\item [Titel : ] ##l.}°/„ 

H'/. 

\end{description} 

} 

\begin{document} 
\nocite{*} 

\bibliography{simple} 

\bibliographystyle{erw4} 

\end{document} 



9 Erweiterung #5: default .type 

Unsere bisherige Literaturdatenbank wird nun erweitert: 

1. Neues Feld namens year. 

2. Neue Eintragstypen report etc. 
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7, erw5.bib 
@book{eins, 

author = {Bernd Raichle}, 

title = {Bib\TeX-Programmierung} , 

year = 2001 

} 

@book{zwei, 

author = {A.U. Thor}, 
title = {Das Buch}, 
year = {2000*B} 

} 

@report{drei, 

author = {Un Bekannt and Ohne Namen and Name Nslos} , 
titel = {Ein Bericht} 

} 



Eintragstypen, fur die keine spezielle Funktion definiert wurde, bei denen man aber einen 
Fehlerabbruch durch BibTpjX vermeiden will, kann man mit der speziellen Funktion default . type 
verarbeiten. 



7. erw5.bst 




FUNCTION {default. type} 




{ "??" begin. entry 




"author" author format 


feld 


"title" title format 


feld 


end . entry 




} 





BibT^X gibt fur diese undefinierten Eintragstypen eine entsprechende Warnung aus: 



% erw5.blg 

This is BibTeX, Version 0.99c (Web2C 7.3.1) 
The top-level auxiliary file: erw5 . aux 
The style file: erw5.bst 
Database file #1: erw5.bib 

Warning — entry type for "drei" isn't style-file defined 
— line 13 of file erw5.bib 
(There was 1 warning) 
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10 Erweiterung #6: Weiteres Feld year 

Folgende Anderungen sind notwendig, um das neue Feld year ebenso zu verarbeiten: 



1 erw6.bst 




ENTRY 




{ author 




title 




year 


r/.°/.n ««««««< 


} 




O 




{} 




FUNCTION {format . author .title . year} 


1117,1 ««««««< 


{ "author" author format. feld 




"title" title format. feld 




"year" year format. feld 




} 




FUNCTION {book} 




{ "Buch" begin . entry 




format . author .title . year 


mil ««««««< 


end. entry 




} 




FUNCTION {default. type} 




{ "??" begin. entry 




format . author .title . year 


um ««««««< 


end . entry 




} 





Parallel dazu werden die I^TpjX-Markup-Anweisungen erganzt: 
1 erw6.tex 

\documentclass [a4paper] {article} 

\newenvironment {entry} [2] {\bibitem [#1] {#2} " #2 " : 1 
\begin{description}7 0 

\renewcommand\author [1] {\item [Autor : ] ##1 . }°/ 0 
\renewcommand\title [l]{\item[Titel:] ##l.}°/„ 
\renewcommand\year [1] {\item [Jahr : ] ##1.}7« 
\newcommand\sortkey [1] {\item [Sortierschl\"ussel : ] ##l.}°/ 0 

}{7. 

\end{description} 

} 

\begin{document} 

\nocite{*} 

\bibliography{erw5} 

\bibliographystyle{erw6} 

\end{document} 
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11 Erweiterung #7: Sortierung nach Feld year 



BibT^X verwendet zum Sortieren der eingelesenen Literatureintrage das fur jcden Eintrag 
vordefinierte Feld sort.key$ vom Typ Zeichenkette. Dieses Feld mufi vor dem Sortierlauf 
durch einen geeigneten Sortierschliissel besetzt werden: 



7, erw7sort.bst 




FUNCTION {presort} 


nr/.y. ««««««< 


{ year 




duplicate$ empty! 


7, ist Jahr-Feld vorhanden und nicht-leer? 


{ pop$ "" } 




'skip$ 




if$ 




" " * % 


sickerstellen, dass mind. 1 Zeichen vorhanden 


purify$ 7. 


nur alphanumerischen Zeichen und Leerzeichen 


"1" change. case$ % 


alles in Kleinbuchstaben wandeln 


#1 entry. max$ substrings 7 0 zu langen String abschneiden 


'sort.key$ := 

} 




READ 




ITERATE {presort} 


VLTL'L ««««««< 


SORT 


1VLTL ««««««< 


EXECUTE {begin. bib} 




ITERATE {call.type$} 




EXECUTE {end. bib} 





Urn zum Experimentieren die errechneten Sortierschliissel sort.key$ sichtbar zu machen, 
kann man sich folgender Anderungen bedienen: 
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°/ erwYsort bs"t 




FUNCTION {book} 




-f " Bnrh " bee in pntrv 




" sortkey " sort . key$ format . f eld 


°/.°/.n°/. ««««««< 


format . author . title . year 




end entrv 




} 




FUNCTION {default. type} 




{ "??" begin. entry 




"sortkey" sort.key$ f ormat . f eld 


VhlVh ««««««< 


format . author .title . year 




end. entry 




} 





In der Datei erw6.tex der vorigen Erweiterung ist bereits IM^X-Markup fiir den Sortier- 
schliissel definiert. 



12 Erweiterung #8: Formatieren von Namen 



7, erw8names .bst 



FUNCTION {format. names} V/'LVL ««««««< 

{ duplicate$ empty! 

{ pop$ pop$ } 

{ format .namelist } 
if$ 

} 

FUNCTION {format . author .title . year} 

{ "author" author format. names °/°/XL°L ««««««< 
"title" title f ormat. f eld 
"year" year f ormat. f eld 

} 



Die neue Funktion format .namelist geht in einer Schleife liber die Liste der Namen, die 
in der Zeichenkette des Literaturdatenbankeintrags mit dem Schliisselwort „and" aneinan- 
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dergereiht vorliegen. 

num.names$ liefert die Anzahl der Namen in einer Zeichenkette, format. name$ greift den 
x-ten Namen heraus und formatiert ihn gemafi der Formatiervorgabe. 



% erw8names . bst 




STRINGS { namelist tag } 


11111 ««««««< 


INTEGERS { numnames } 


17,111 ««««««< 


FUNCTION {format .namelist} 


11111 ««««««< 


{ 'namelist := 




'tag := 




namelist num.names$ 'numnames 




{ numnames #0 > } 




{ tag 




namelist numnames "{ff~}{vv~ 


}{11>{, jj}" format. name$ 


format . f eld 




numnames #1 - 'numnames := 




} 




while$ 




} 





Anmerkung: Zur Vereinfachung des vorgestellten Codes geht die gezeigte Funktion die Na- 
mensliste von hinten nach vorne durch. 

13 Erweiterung #8a: Variante 

Statt einer Variablen kann der Stapel haufig zur Speicherung verwendet werden, hier zur 
Speicherung des I^T^X-Markup-Tag „ author": 
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7, erw9names .bst 








INTEGERS { numnames } 




FUNCTION {format .namelist} 




L llcULltJX J. o u 




nampl i nnm Tiamp'^ft J minTnamp^ 

HCmiv -1 L O U XX IXUX • XlCUlll^Ovp' XX UXXLLXXqJJXw o • 




■T Tiiinmflinp^ itO ^ r 

L XX U.111XXCL111C O TtW J 




{ duDlicate$ "/ LaTeX-Tac " 


V \3 X. WUU^X XX 


namelist numnames "{ff~Mvv 


"HUH, jj}" format. name$ 


format . f eld 




numnames #1 - 'numnames := 




} 




while! 




pop$ 7, LaTeX-Tag "... 


" entfernen 


} 





14 IfT^X ist nicht alles: Generierung von XML 

Man kann BibT^X nicht nur dazu verwenden, urn eine bbl-Datei mit M^X-Umgebungen 
und -Anweisungen zu erzeugen. Folgendes Beispiel zeigt einen tmvollstandigen Ansatz, um 
aus einer Literaturdatenbank eine XML-Datei zu erzeugen. 



7. simplexml . bst 




ENTRY 




{ author 




title 




} 




O 




O 




FUNCTION {book} 




{ "<book>" write$ newline$ 




" <author>" author * "</author> 


' * write$ newline$ 


" <title>" title "</title>" * * 


write$ newline$ 


"</book>" write$ newline$ 




} 




READ 




ITERATE {call.type$> 
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°/ 0 simplexml . bbl 
<book> 

<author>Bernd Raichle</author> 
<title>Bib\TeX-Programmierung</title> 

</book> 

<book> 

<author>A.U. Thor</author> 
<title>Das Buch</title> 
</book> 



Um aus diesem sehr einfachen Beispiel, wie man Eintrage einer Literaturdatenbank mit 
XML-Markup versehen kann, eine vollstandige Losung zu machen, sind jedoch noch sehr viel 
mehr Dinge notwendig: Beispielsweise sollten Umlaute, andere Sonderzeichen als auch alle in 
der Literaturdatenbank verwendeten LEX-Eingabenotationen in ein entsprechendes XML- 
Aquivalent umgesetzt werden. BibTgX kennt leider keinerlei einfachen Textersetzungsan- 
weisungen. Stattdessen muss man diese mit den vordefmierten Funktionen wie substrings 
und Schleifen selbst implementieren. 

Um TpX-Markup in entsprechenden XML-Markup umzusetzen, ist etwas mehr Aufwand 
notwendig. Hier ein Beispiel, wie das IpX-Logo \TeX ersetzt werden konnte: 

7, stringmanip.bst 



INTEGERS {len} 

STRINGS {string newstring} 

FUNCTION {substexlogo} 
{ 

'string := 

"" 'newstring := 

string text . length! 'len := '/, Laenge des Strings 
{ len #0 > } 

{ string #1 #4 substring! 

"\TeX" = 7. Vergleiche erste 4 Zeichen mit "\TeX" 

{ newstring "&TeX;" * 'newstring := 

string #5 len substring! 'string := 

} 

{ newstring string #1 #1 substring! * 'newstring := 
string #2 len substring! 'string := 

} 

if! 

string text. length! 'len := 7. Laenge des Strings neu berechnen 

} 

while! 
newstring 
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Die Funktion substexlogo zeigt eine mogliche Losung, wie man in BibTp^X nach einer 
Zeichenkette suchen und diese durch eine andere Zeichenkette ersetzen kann. Ich habe mich 
dabei auf die Zeichenkette „\TeX", bestehend aus vier Zeichen, beschrankt, die durch das 
XML-Literal „&TeX;" ersetzt wird. 

Mit der Funktion substrings ist es leider nicht moglich, eine exakt vorher festlegbare 
Anzahl von Zeichen als Teilzeichenkette zu erhalten, da das Langen- Argument der Funktion 
nicht die Zahl der Zeichen, sondern die geforderte Zahl von aufeinanderfolgenden Zeichen, die 
ungleich dem Leerzeichen sind, angibt. Somit erhalt man haufig eine langere Teilzeichenkette 
als Ergebnis. Daher habe ich obige Such- und Ersetze-Funktion so geschrieben, dass jeweils 
zeichenweise durch die Zeichenkette gewandert wird, dabei immer ein einzelnes Zeichen 
abgeschnitten und mit diesem eine neue Ergebniszeichenkette zusammengebaut wird. 

Um die Funktion substexlogo perfekt zu machen, musste man die Funktion noch dahin- 
gehend erweitern, dass die Ersetzung nur dann erfolgt, wenn nach der Zeichenkette „\TeX" 
ein Zeichen folgt, das nicht ein Buchstabe ist. 

°/ 0 stringmanip.bst . . . continued 

FUNCTION {book} 

{ "<book>" write$ newline$ 

" <author>" author substexlogo * "</author>" * write$ newline$ 

" <title>" title substexlogo "</title>" * * write$ newline$ 

"</book>" write$ newline$ 



READ 

ITERATE {call.type$> 



. . . und hier sieht man das entstandene XML-Literaturverzeichnis: 



7o stringmanip.bbl 
<book> 

<author>Bernd Raichle</author> 
<title>Bib&TeX; -Programmierung</title> 

</book> 

<book> 

<author>A.U. Thor</author> 
<title>Das Buch</title> 
</book> 
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